home *** CD-ROM | disk | FTP | other *** search
/ SPACE 2 / SPACE - Library 2 - Volume 1.iso / telecom / 86 / pascal / freeram.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1986-12-19  |  149 b   |  7 lines
  1. program freeram;
  2. begin
  3.   writeln('Availabel memory: ',Trunc(MemAvail/512),'K');
  4.   writeln;writeln('Hit return to continue...');
  5.   readln;
  6. end.
  7.